home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CD-ROM Magazine 28 Bonus
/
CDRomMagazine-SoftKey-ArtPassion-FrenchVersion-Win31Mac.bin
/
data
/
shared.dir
/
03029_Script_ROLLOVER HOTSPOTS
< prev
next >
Wrap
Text File
|
1996-06-21
|
2KB
|
50 lines
-- ---------------------------------------------------------------
-- Handler processFrameCheckHotspotRoll is given a two parameters.
-- The first is the labelSprite and the second is a list of lists on
-- hotspots of the form: rolloversprite, labelCast, labelH, labelV.
-- The proper label is displayed when the mouse rolls over a hotpsot
-- in the list.
on processFrameCheckHotspotRoll hotspotList
global labelSprite
set the stretch of sprite labelSprite = TRUE
puppetSprite labelSprite, FALSE
processFrame
repeat with i = 1 to count(hotspotList)
set currentHotspot = getAt(hotspotList,i)
set hotspotSprite = getAt(currentHotspot,1)
set labelCast = getAt(currentHotspot,2)
set labelH = getAt(currentHotspot,3)
set labelV = getAt(currentHotspot,4)
if rollover(hotspotSprite) then
puppetSprite labelSprite, TRUE
set the locH of sprite labelSprite = labelH
set the locV of sprite labelSprite = labelV
set the castNum of sprite labelSprite = the number of cast labelCast
set the height of sprite labelSprite = the height of cast labelCast
set the width of sprite labelSprite = the width of cast labelCast
updateStage
--else
-- checkBackButtonRoll(point(the mouseH, the mouseV))
end if
end repeat
updateStage
end
on processFrameCheckHotspotRollPause hotspotList
processFrameCheckHotspotRoll hotspotList
go to the frame
end
on removeLabels
global labelSprite
removeFromStage(labelSprite)
end